(vc-hg-rename-file): Fix argument order.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 7f0fe4f3c4d183b21fa62787434241dd7a9afeec..c99446f1e4a3b76065ffc1631b02153e357fc96a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-04-28  Sam Steingold  <sds@gnu.org>
+
+       * vc-hg.el (vc-hg-rename-file): Fix argument order.
+
 2008-04-28  Bastien Guerry  <bzg@altern.org>
 
        * whitespace.el (whitespace-trailing): Fix typo.

diff --git a/lisp/vc-hg.el b/lisp/vc-hg.el
index c9cfc8eff61ec313b48dc49059ff1c433b17a28b..7755e92dbc46f7321f37054c563722fe4e264ca7 100644 (file)
--- a/lisp/vc-hg.el
+++ b/lisp/vc-hg.el
@@ -390,7 +390,7 @@ Optional arg REVISION is a revision to annotate from."
 ;; Modelled after the similar function in vc-bzr.el
 (defun vc-hg-rename-file (old new)
   "Rename file from OLD to NEW using `hg mv'."
-  (vc-hg-command nil 0 new old "mv"))
+  (vc-hg-command nil 0 new "mv" old))
 
 (defun vc-hg-register (files &optional rev comment)
   "Register FILES under hg.